object dmKiloutou: TdmKiloutou
  OldCreateOrder = False
  Left = 341
  Top = 156
  Height = 640
  Width = 870
  object dbKiloutou: TIBDatabase
    DatabaseName = '127.0.0.1:C:\Users\juliens\Desktop\testIHM\kiloutou.fdb'
    Params.Strings = (
      'user_name=sysdba'
      'password=masterkey')
    LoginPrompt = False
    DefaultTransaction = trKiloutou
    IdleTimer = 0
    SQLDialect = 3
    TraceFlags = []
    Left = 224
    Top = 64
  end
  object trKiloutou: TIBTransaction
    Active = False
    DefaultDatabase = dbKiloutou
    AutoStopAction = saNone
    Left = 224
    Top = 136
  end
  object dsLocation: TDataSource
    DataSet = dsetLocation
    Left = 216
    Top = 312
  end
  object tClient: TIBTable
    Database = dbKiloutou
    Transaction = trKiloutou
    BufferChunks = 1000
    CachedUpdates = False
    FieldDefs = <
      item
        Name = 'CODE_CLIENT'
        Attributes = [faRequired]
        DataType = ftInteger
      end
      item
        Name = 'NOM'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'PRENOM'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'AGE'
        DataType = ftInteger
      end>
    IndexDefs = <
      item
        Name = 'PK_CLIENT'
        Fields = 'CODE_CLIENT'
        Options = [ixUnique]
      end
      item
        Name = 'CLIENT_IDX1'
        Fields = 'NOM;PRENOM'
        Options = [ixUnique]
      end>
    StoreDefs = True
    TableName = 'CLIENT'
    Left = 112
    Top = 192
    object tClientNOM: TIBStringField
      FieldName = 'NOM'
      Size = 150
    end
    object tClientPRENOM: TIBStringField
      FieldName = 'PRENOM'
      Size = 150
    end
    object tClientAGE: TIntegerField
      FieldName = 'AGE'
    end
    object tClientCODE_CLIENT: TIntegerField
      FieldName = 'CODE_CLIENT'
    end
  end
  object tMateriel: TIBTable
    Database = dbKiloutou
    Transaction = trKiloutou
    BufferChunks = 1000
    CachedUpdates = False
    FieldDefs = <
      item
        Name = 'CODE_MATERIEL'
        Attributes = [faRequired]
        DataType = ftInteger
      end
      item
        Name = 'NOM'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'DESCRIPTION'
        DataType = ftBlob
        Size = 8
      end
      item
        Name = 'PRIX'
        DataType = ftBCD
        Precision = 18
        Size = 2
      end
      item
        Name = 'TYPE_MATERIEL'
        DataType = ftInteger
      end>
    IndexDefs = <
      item
        Name = 'PK_MATERIEL'
        Fields = 'CODE_MATERIEL'
        Options = [ixUnique]
      end>
    StoreDefs = True
    TableName = 'MATERIEL'
    Left = 320
    Top = 192
    object tMaterielNOM: TIBStringField
      FieldName = 'NOM'
      Size = 150
    end
    object tMaterielDESCRIPTION: TBlobField
      FieldName = 'DESCRIPTION'
      BlobType = ftBlob
      Size = 8
    end
    object tMaterielPRIX: TIBBCDField
      FieldName = 'PRIX'
      Precision = 18
      Size = 2
    end
    object tMaterielTYPE_MATERIEL: TIntegerField
      FieldName = 'TYPE_MATERIEL'
    end
    object tMaterielCODE_MATERIEL: TAutoIncField
      FieldName = 'CODE_MATERIEL'
    end
  end
  object dsetLocation: TIBDataSet
    Database = dbKiloutou
    Transaction = trKiloutou
    ForcedRefresh = True
    BufferChunks = 1000
    CachedUpdates = True
    SelectSQL.Strings = (
      'select '
      'LOCATION.CODE_LOCATION,'
      'CLIENT.NOM, '
      'CLIENT.PRENOM, '
      'MATERIEL.NOM, '
      'LOCATION.DEBUT_LOCATION,'
      'LOCATION.RETOUR_LOCATION '
      ''
      'from MATERIEL, CLIENT, LOCATION '
      ''
      'WHERE LOCATION.CODE_CLIENT = CLIENT.CODE_CLIENT '
      ''
      'AND '
      ''
      'LOCATION.CODE_MATERIEL= MATERIEL.CODE_MATERIEL ')
    Left = 216
    Top = 248
    object dsetLocationCODE_LOCATION: TIntegerField
      FieldName = 'CODE_LOCATION'
      Origin = '"LOCATION"."CODE_LOCATION"'
      Required = True
    end
    object dsetLocationNOM: TIBStringField
      FieldName = 'NOM'
      Origin = '"CLIENT"."NOM"'
      Size = 50
    end
    object dsetLocationPRENOM: TIBStringField
      FieldName = 'PRENOM'
      Origin = '"CLIENT"."PRENOM"'
      Size = 50
    end
    object dsetLocationNOM1: TIBStringField
      FieldName = 'NOM1'
      Origin = '"MATERIEL"."NOM"'
      Size = 50
    end
    object dsetLocationDEBUT_LOCATION: TDateTimeField
      FieldName = 'DEBUT_LOCATION'
      Origin = '"LOCATION"."DEBUT_LOCATION"'
    end
    object dsetLocationRETOUR_LOCATION: TDateTimeField
      FieldName = 'RETOUR_LOCATION'
      Origin = '"LOCATION"."RETOUR_LOCATION"'
    end
  end
  object tCamion: TIBTable
    Database = dbKiloutou
    Transaction = trKiloutou
    BufferChunks = 1000
    CachedUpdates = False
    DefaultIndex = False
    FieldDefs = <
      item
        Name = 'CODE_CAMION'
        Attributes = [faRequired]
        DataType = ftInteger
      end
      item
        Name = 'POIDSTOTAL'
        DataType = ftBCD
        Precision = 18
        Size = 2
      end
      item
        Name = 'POIDSTRANSPORTABLE'
        DataType = ftBCD
        Precision = 18
        Size = 2
      end
      item
        Name = 'CODE_MATERIEL'
        DataType = ftInteger
      end>
    IndexDefs = <
      item
        Name = 'PK_CAMION'
        Fields = 'CODE_CAMION'
        Options = [ixUnique]
      end
      item
        Name = 'FK_CAMION_1'
        Fields = 'CODE_MATERIEL'
      end>
    StoreDefs = True
    TableName = 'CAMION'
    Left = 400
    Top = 192
    object tCamionPOIDSTOTAL: TIBBCDField
      FieldName = 'POIDSTOTAL'
      Precision = 18
      Size = 2
    end
    object tCamionPOIDSTRANSPORTABLE: TIBBCDField
      FieldName = 'POIDSTRANSPORTABLE'
      Precision = 18
      Size = 2
    end
    object tCamionCODE_MATERIEL: TIntegerField
      FieldName = 'CODE_MATERIEL'
    end
  end
  object tTondeuse: TIBTable
    Database = dbKiloutou
    Transaction = trKiloutou
    BufferChunks = 1000
    CachedUpdates = False
    FieldDefs = <
      item
        Name = 'CODE_TONDEUSE'
        Attributes = [faRequired]
        DataType = ftInteger
      end
      item
        Name = 'VITESSE'
        DataType = ftBCD
        Precision = 18
        Size = 2
      end
      item
        Name = 'CODE_MATERIEL'
        DataType = ftInteger
      end>
    IndexDefs = <
      item
        Name = 'PK_TONDEUSE'
        Fields = 'CODE_TONDEUSE'
        Options = [ixUnique]
      end
      item
        Name = 'FK_TONDEUSE_1'
        Fields = 'CODE_MATERIEL'
      end>
    StoreDefs = True
    TableName = 'TONDEUSE'
    Left = 456
    Top = 192
    object tTondeuseCODE_MATERIEL: TAutoIncField
      FieldName = 'CODE_MATERIEL'
      KeyFields = 'CODE_MATERIEL'
    end
    object tTondeuseVITESSE: TIBBCDField
      FieldName = 'VITESSE'
      Precision = 18
      Size = 2
    end
  end
  object tPelleteuse: TIBTable
    Database = dbKiloutou
    Transaction = trKiloutou
    BufferChunks = 1000
    CachedUpdates = False
    FieldDefs = <
      item
        Name = 'CODE_PELLETEUSE'
        Attributes = [faRequired]
        DataType = ftInteger
      end
      item
        Name = 'POIDSTOTAL'
        DataType = ftBCD
        Precision = 18
        Size = 2
      end
      item
        Name = 'CODE_MATERIEL'
        DataType = ftInteger
      end>
    IndexDefs = <
      item
        Name = 'PK_PELLETEUSE'
        Fields = 'CODE_PELLETEUSE'
        Options = [ixUnique]
      end
      item
        Name = 'FK_PELLETEUSE_1'
        Fields = 'CODE_MATERIEL'
      end>
    StoreDefs = True
    TableName = 'PELLETEUSE'
    Left = 520
    Top = 192
    object tPelleteusePOIDSTOTAL: TIBBCDField
      FieldName = 'POIDSTOTAL'
      Precision = 18
      Size = 2
    end
    object tPelleteuseCODE_MATERIEL: TIntegerField
      FieldName = 'CODE_MATERIEL'
    end
  end
  object tLocation: TIBTable
    Database = dbKiloutou
    Transaction = trKiloutou
    BufferChunks = 1000
    CachedUpdates = False
    FieldDefs = <
      item
        Name = 'CODE_LOCATION'
        Attributes = [faRequired]
        DataType = ftInteger
      end
      item
        Name = 'CODE_CLIENT'
        DataType = ftInteger
      end
      item
        Name = 'CODE_MATERIEL'
        DataType = ftInteger
      end
      item
        Name = 'DEBUT_LOCATION'
        DataType = ftDateTime
      end
      item
        Name = 'RETOUR_LOCATION'
        DataType = ftDateTime
      end>
    IndexDefs = <
      item
        Name = 'PK_LOCATION'
        Fields = 'CODE_LOCATION'
        Options = [ixUnique]
      end
      item
        Name = 'FK_LOCATION_1'
        Fields = 'CODE_CLIENT'
      end
      item
        Name = 'FK_LOCATION_2'
        Fields = 'CODE_MATERIEL'
      end>
    StoreDefs = True
    TableName = 'LOCATION'
    Left = 216
    Top = 192
    object tLocationCODE_CLIENT: TIntegerField
      FieldName = 'CODE_CLIENT'
    end
    object tLocationCODE_MATERIEL: TIntegerField
      FieldName = 'CODE_MATERIEL'
    end
    object tLocationDEBUT_LOCATION: TDateTimeField
      FieldName = 'DEBUT_LOCATION'
    end
    object tLocationRETOUR_LOCATION: TDateTimeField
      FieldName = 'RETOUR_LOCATION'
    end
    object tLocationCODE_LOCATION: TIntegerField
      FieldName = 'CODE_LOCATION'
    end
  end
  object dsClient: TDataSource
    DataSet = tClient
    Left = 120
    Top = 312
  end
  object dsMateriel: TDataSource
    DataSet = tMateriel
    Left = 312
    Top = 320
  end
end
